﻿Public Class Inicio

    Private Sub btnFacturas_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFacturas.Click
        Dim forma As New Poliza_CxP
        forma.ShowDialog()
        Me.BringToFront()
    End Sub

    Private Sub btnInventarios_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTienda.Click
        Dim forma As New Poliza_Tienda_CxP
        forma.ShowDialog()
        Me.BringToFront()
    End Sub

    Private Sub Salir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Salir.Click
        Me.Close()
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnInventario.Click
        Dim forma As New Poliza_Inventario
        forma.ShowDialog()
        Me.BringToFront()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEstados.Click
        Dim forma As New Estados
        forma.ShowDialog()
        Me.BringToFront()
    End Sub

    Private Sub Inicio_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim origen As Point
        origen.X = Screen.GetWorkingArea(New Point).X + 20
        origen.Y = Screen.GetWorkingArea(New Point).Y + 20

        Me.Location = origen
    End Sub

    Private Sub btnMovimientos_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMovimientos.Click
        Dim forma As New Clasificacion
        forma.ShowDialog()
        Me.BringToFront()
    End Sub
End Class